0 C=&HE7C3:SCREEN7,0,0:CLS:LOCATE0,6,0:ATTRB1,1:FORT=1TO7:COLORT:PRINTSPC(4)"DEMONSTRATION":NEXT:ATTRB0,0:FORT=0TO6STEP2:CONSOLE5=T,18-T:FORI=1TO112-T*16-64*(T=6):POKEC,1:!3:POKEC,0:!3:NEXTI,T:FORT=5TO17STEP2:BEEP:CONSOLET,T+1:FORI=1TO40:POKEC,1
1 PLAY"L2P":!1:POKEC,0:!1:NEXTI,T:CONSOLE5,19:FORT=1TO120:POKEC,0:!2:!4:POKEC,1:!2:!4:NEXT:LOCATE0,20:ATTRB0,1:PRINT:Press ACTION";:CONSOLE19,20:FORT=0TO1STEP0:IFSTRIG(0)=0THEN!RND*3+1:NEXTELSEATTRB0,0:CLS:CONSOLE0,24